home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / pctj8409.arc / SWITCH.ASM < prev    next >
Assembly Source File  |  1986-09-14  |  512b  |  24 lines
  1. ; ROUTINE TO SWITCH TWO STRINGS
  2. ;
  3. switch    proc    far
  4. ;
  5.     push    si        ; save registers
  6.     push    di
  7.     push    cx
  8.     push    ax
  9. ;
  10.     cld            ; forword direction
  11. switch1:
  12.     mov    al,[di]        ; get byte from destination
  13.     movsb            ; move from source to destination
  14.     mov    es:[si-1],al    ; put byte in source
  15.     loop    switch1        ; loop back for more
  16. ;
  17.     pop    ax        ; restore registers
  18.     pop    cx
  19.     pop    di
  20.     pop    si
  21.     ret
  22. ;
  23. switch    endp
  24.